home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-05-21 | 7.7 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 100%
| file
| Emacs/XEmacs v20 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar 9 12|
|00000040| 3a 35 34 3a 30 39 20 31 | 39 39 38 0a 3b 3b 3b 20 |:54:09 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 70 73 67 6d |s-20.3/l|isp/psgm|
|000000a0| 6c 2f 70 73 67 6d 6c 2d | 64 65 62 75 67 2e 65 6c |l/psgml-|debug.el|
|000000b0| 0a 3b 3b 3b 20 65 6d 61 | 63 73 20 76 65 72 73 69 |.;;; ema|cs versi|
|000000c0| 6f 6e 20 32 30 2e 34 20 | 22 45 6d 65 72 61 6c 64 |on 20.4 |"Emerald|
|000000d0| 22 20 58 45 6d 61 63 73 | 20 20 4c 75 63 69 64 2e |" XEmacs| Lucid.|
|000000e0| 0a 3b 3b 3b 20 62 79 74 | 65 63 6f 6d 70 20 76 65 |.;;; byt|ecomp ve|
|000000f0| 72 73 69 6f 6e 20 32 2e | 32 35 20 58 45 6d 61 63 |rsion 2.|25 XEmac|
|00000100| 73 3b 20 32 32 2d 4d 61 | 72 2d 39 36 2e 0a 3b 3b |s; 22-Ma|r-96..;;|
|00000110| 3b 20 6f 70 74 69 6d 69 | 7a 61 74 69 6f 6e 20 69 |; optimi|zation i|
|00000120| 73 20 6f 6e 2e 0a 3b 3b | 3b 20 74 68 69 73 20 66 |s on..;;|; this f|
|00000130| 69 6c 65 20 75 73 65 73 | 20 6f 70 63 6f 64 65 73 |ile uses| opcodes|
|00000140| 20 77 68 69 63 68 20 64 | 6f 20 6e 6f 74 20 65 78 | which d|o not ex|
|00000150| 69 73 74 20 69 6e 20 45 | 6d 61 63 73 20 31 39 2e |ist in E|macs 19.|
|00000160| 0a 0a 28 69 66 20 28 61 | 6e 64 20 28 62 6f 75 6e |..(if (a|nd (boun|
|00000170| 64 70 20 27 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |dp 'emac|s-versio|
|00000180| 6e 29 0a 09 20 28 6f 72 | 20 28 61 6e 64 20 28 62 |n).. (or| (and (b|
|00000190| 6f 75 6e 64 70 20 27 65 | 70 6f 63 68 3a 3a 76 65 |oundp 'e|poch::ve|
|000001a0| 72 73 69 6f 6e 29 20 65 | 70 6f 63 68 3a 3a 76 65 |rsion) e|poch::ve|
|000001b0| 72 73 69 6f 6e 29 0a 09 | 20 20 20 20 20 28 73 74 |rsion)..| (st|
|000001c0| 72 69 6e 67 2d 6c 65 73 | 73 70 20 65 6d 61 63 73 |ring-les|sp emacs|
|000001d0| 2d 76 65 72 73 69 6f 6e | 20 22 32 30 22 29 29 29 |-version| "20")))|
|000001e0| 0a 20 20 20 20 28 65 72 | 72 6f 72 20 22 60 70 73 |. (er|ror "`ps|
|000001f0| 67 6d 6c 2d 64 65 62 75 | 67 2e 65 6c 27 20 77 61 |gml-debu|g.el' wa|
|00000200| 73 20 63 6f 6d 70 69 6c | 65 64 20 66 6f 72 20 45 |s compil|ed for E|
|00000210| 6d 61 63 73 20 32 30 22 | 29 29 0a 0a 28 6f 72 20 |macs 20"|))..(or |
|00000220| 28 62 6f 75 6e 64 70 20 | 27 63 75 72 72 65 6e 74 |(boundp |'current|
|00000230| 2d 6c 6f 61 64 2d 6c 69 | 73 74 29 20 28 73 65 74 |-load-li|st) (set|
|00000240| 71 20 63 75 72 72 65 6e | 74 2d 6c 6f 61 64 2d 6c |q curren|t-load-l|
|00000250| 69 73 74 20 6e 69 6c 29 | 29 0a 0a 0a 28 62 79 74 |ist nil)|)...(byt|
|00000260| 65 2d 63 6f 64 65 20 22 | c0 c1 21 88 c2 c3 21 88 |e-code "|..!...!.|
|00000270| c2 c4 21 88 c2 c5 21 88 | c2 c6 21 87 22 20 5b 70 |..!...!.|..!." [p|
|00000280| 72 6f 76 69 64 65 20 70 | 73 67 6d 6c 2d 64 65 62 |rovide p|sgml-deb|
|00000290| 75 67 20 72 65 71 75 69 | 72 65 20 70 73 67 6d 6c |ug requi|re psgml|
|000002a0| 20 70 73 67 6d 6c 2d 70 | 61 72 73 65 20 70 73 67 | psgml-p|arse psg|
|000002b0| 6d 6c 2d 65 64 69 74 20 | 70 73 67 6d 6c 2d 64 74 |ml-edit |psgml-dt|
|000002c0| 64 5d 20 32 29 0a 23 40 | 32 20 1f 0a 28 61 75 74 |d] 2).#@|2 ..(aut|
|000002d0| 6f 6c 6f 61 64 20 27 73 | 67 6d 6c 2d 74 72 61 6e |oload 's|gml-tran|
|000002e0| 73 6c 61 74 65 2d 6d 6f | 64 65 6c 20 22 70 73 67 |slate-mo|del "psg|
|000002f0| 6d 6c 2d 64 74 64 22 20 | 27 28 23 24 20 2e 20 37 |ml-dtd" |'(#$ . 7|
|00000300| 31 34 29 20 6e 69 6c 29 | 0a 28 62 79 74 65 2d 63 |14) nil)|.(byte-c|
|00000310| 6f 64 65 20 22 c0 09 c2 | c3 23 88 c0 09 c4 c5 23 |ode "...|.#.....#|
|00000320| 88 c0 09 c6 c7 23 87 22 | 20 5b 64 65 66 69 6e 65 |.....#."| [define|
|00000330| 2d 6b 65 79 20 73 67 6d | 6c 2d 6d 6f 64 65 2d 6d |-key sgm|l-mode-m|
|00000340| 61 70 20 22 03 2c 22 20 | 73 67 6d 6c 2d 67 6f 74 |ap ".," |sgml-got|
|00000350| 6f 2d 63 61 63 68 65 20 | 22 03 18 22 20 73 67 6d |o-cache |".." sgm|
|00000360| 6c 2d 64 75 6d 70 2d 74 | 72 65 65 20 22 03 2e 22 |l-dump-t|ree ".."|
|00000370| 20 73 67 6d 6c 2d 73 68 | 6f 72 74 72 65 66 2d 69 | sgml-sh|ortref-i|
|00000380| 64 65 6e 74 69 66 79 5d | 20 34 29 0a 28 64 65 66 |dentify]| 4).(def|
|00000390| 61 6c 69 61 73 20 27 73 | 67 6d 6c 2d 74 68 69 73 |alias 's|gml-this|
|000003a0| 2d 65 6c 65 6d 65 6e 74 | 20 23 5b 6e 69 6c 20 22 |-element| #[nil "|
|000003b0| c0 60 21 19 c2 09 21 29 | 87 22 20 5b 73 67 6d 6c |.`!...!)|." [sgml|
|000003c0| 2d 66 69 6e 64 2d 65 6c | 65 6d 65 6e 74 2d 6f 66 |-find-el|ement-of|
|000003d0| 20 74 72 65 65 20 73 67 | 6d 6c 2d 64 75 6d 70 2d | tree sg|ml-dump-|
|000003e0| 72 65 63 5d 20 32 20 6e | 69 6c 20 6e 69 6c 5d 29 |rec] 2 n|il nil])|
|000003f0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 73 67 6d 6c |.(defali|as 'sgml|
|00000400| 2d 67 6f 74 6f 2d 63 61 | 63 68 65 20 23 5b 6e 69 |-goto-ca|che #[ni|
|00000410| 6c 20 22 08 c1 48 5c 6e | 73 ac 85 c3 c4 08 5c 22 |l "..H\n|s.....\"|
|00000420| 88 08 c5 48 16 06 08 c1 | 48 5c 6e 73 ac 85 c3 c7 |...H....|H\ns....|
|00000430| 08 5c 22 88 08 c8 48 16 | 09 ca 60 21 88 cb cc cd |.\"...H.|..`!....|
|00000440| 0e 0e 21 5c 22 87 22 20 | 5b 73 67 6d 6c 2d 62 75 |..!\"." |[sgml-bu|
|00000450| 66 66 65 72 2d 70 61 72 | 73 65 2d 73 74 61 74 65 |ffer-par|se-state|
|00000460| 20 30 20 63 6c 2d 73 74 | 72 75 63 74 2d 73 67 6d | 0 cl-st|ruct-sgm|
|00000470| 6c 2d 70 73 74 61 74 65 | 2d 74 61 67 73 20 65 72 |l-pstate|-tags er|
|00000480| 72 6f 72 20 22 73 67 6d | 6c 2d 70 73 74 61 74 65 |ror "sgm|l-pstate|
|00000490| 2d 64 74 64 20 61 63 63 | 65 73 73 69 6e 67 20 61 |-dtd acc|essing a|
|000004a0| 20 6e 6f 6e 2d 73 67 6d | 6c 2d 70 73 74 61 74 65 | non-sgm|l-pstate|
|000004b0| 22 20 31 20 73 67 6d 6c | 2d 64 74 64 2d 69 6e 66 |" 1 sgml|-dtd-inf|
|000004c0| 6f 20 22 73 67 6d 6c 2d | 70 73 74 61 74 65 2d 74 |o "sgml-|pstate-t|
|000004d0| 6f 70 2d 74 72 65 65 20 | 61 63 63 65 73 73 69 6e |op-tree |accessin|
|000004e0| 67 20 61 20 6e 6f 6e 2d | 73 67 6d 6c 2d 70 73 74 |g a non-|sgml-pst|
|000004f0| 61 74 65 22 20 32 20 73 | 67 6d 6c 2d 74 6f 70 2d |ate" 2 s|gml-top-|
|00000500| 74 72 65 65 20 73 67 6d | 6c 2d 66 69 6e 64 2d 73 |tree sgm|l-find-s|
|00000510| 74 61 72 74 2d 70 6f 69 | 6e 74 20 6d 65 73 73 61 |tart-poi|nt messa|
|00000520| 67 65 20 22 25 73 22 20 | 73 67 6d 6c 2d 64 75 6d |ge "%s" |sgml-dum|
|00000530| 70 2d 6e 6f 64 65 20 73 | 67 6d 6c 2d 63 75 72 72 |p-node s|gml-curr|
|00000540| 65 6e 74 2d 74 72 65 65 | 5d 20 34 20 6e 69 6c 20 |ent-tree|] 4 nil |
|00000550| 6e 69 6c 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |nil]).(d|efalias |
|00000560| 27 73 67 6d 6c 2d 64 75 | 6d 70 2d 74 72 65 65 20 |'sgml-du|mp-tree |
|00000570| 23 5b 28 61 72 67 29 20 | 22 08 ab 83 c1 20 88 c2 |#[(arg) |".... ..|
|00000580| 90 c3 0c c5 48 0e 06 73 | ac 85 c7 c8 0c 5c 22 88 |....H..s|.....\".|
|00000590| 0c c9 48 21 91 87 22 20 | 5b 61 72 67 20 73 67 6d |..H!.." |[arg sgm|
|000005a0| 6c 2d 70 61 72 73 65 2d | 74 6f 2d 68 65 72 65 20 |l-parse-|to-here |
|000005b0| 22 2a 44 75 6d 70 2a 22 | 20 73 67 6d 6c 2d 64 75 |"*Dump*"| sgml-du|
|000005c0| 6d 70 2d 72 65 63 20 73 | 67 6d 6c 2d 62 75 66 66 |mp-rec s|gml-buff|
|000005d0| 65 72 2d 70 61 72 73 65 | 2d 73 74 61 74 65 20 30 |er-parse|-state 0|
|000005e0| 20 63 6c 2d 73 74 72 75 | 63 74 2d 73 67 6d 6c 2d | cl-stru|ct-sgml-|
|000005f0| 70 73 74 61 74 65 2d 74 | 61 67 73 20 65 72 72 6f |pstate-t|ags erro|
|00000600| 72 20 22 73 67 6d 6c 2d | 70 73 74 61 74 65 2d 74 |r "sgml-|pstate-t|
|00000610| 6f 70 2d 74 72 65 65 20 | 61 63 63 65 73 73 69 6e |op-tree |accessin|
|00000620| 67 20 61 20 6e 6f 6e 2d | 73 67 6d 6c 2d 70 73 74 |g a non-|sgml-pst|
|00000630| 61 74 65 22 20 32 5d 20 | 35 20 6e 69 6c 20 22 50 |ate" 2] |5 nil "P|
|00000640| 22 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 73 |"]).(def|alias 's|
|00000650| 67 6d 6c 2d 61 75 74 6f | 2d 64 75 6d 70 20 23 5b |gml-auto|-dump #[|
|00000660| 6e 69 6c 20 22 c0 c1 21 | 70 1a 1b 0c ad 9b c5 8e |nil "..!|p.......|
|00000670| 0b 71 88 c6 20 88 29 c7 | 0c c8 48 0e 09 73 ac 85 |.q.. .).|..H..s..|
|00000680| ca cb 0c 5c 22 88 0c cc | 48 21 2a 87 22 20 5b 67 |...\"...|H!*." [g|
|00000690| 65 74 2d 62 75 66 66 65 | 72 2d 63 72 65 61 74 65 |et-buffe|r-create|
|000006a0| 20 22 2a 44 75 6d 70 2a | 22 20 63 62 20 73 74 61 | "*Dump*|" cb sta|
|000006b0| 6e 64 61 72 64 2d 6f 75 | 74 70 75 74 20 73 67 6d |ndard-ou|tput sgm|
|000006c0| 6c 2d 62 75 66 66 65 72 | 2d 70 61 72 73 65 2d 73 |l-buffer|-parse-s|
|000006d0| 74 61 74 65 20 28 28 73 | 65 74 2d 62 75 66 66 65 |tate ((s|et-buffe|
|000006e0| 72 20 63 62 29 29 20 65 | 72 61 73 65 2d 62 75 66 |r cb)) e|rase-buf|
|000006f0| 66 65 72 20 73 67 6d 6c | 2d 64 75 6d 70 2d 72 65 |fer sgml|-dump-re|
|00000700| 63 20 30 20 63 6c 2d 73 | 74 72 75 63 74 2d 73 67 |c 0 cl-s|truct-sg|
|00000710| 6d 6c 2d 70 73 74 61 74 | 65 2d 74 61 67 73 20 65 |ml-pstat|e-tags e|
|00000720| 72 72 6f 72 20 22 73 67 | 6d 6c 2d 70 73 74 61 74 |rror "sg|ml-pstat|
|00000730| 65 2d 74 6f 70 2d 74 72 | 65 65 20 61 63 63 65 73 |e-top-tr|ee acces|
|00000740| 73 69 6e 67 20 61 20 6e | 6f 6e 2d 73 67 6d 6c 2d |sing a n|on-sgml-|
|00000750| 70 73 74 61 74 65 22 20 | 32 5d 20 34 5d 29 0a 28 |pstate" |2] 4]).(|
|00000760| 64 65 66 61 6c 69 61 73 | 20 27 73 67 6d 6c 2d 73 |defalias| 'sgml-s|
|00000770| 74 61 72 74 2d 61 75 74 | 6f 2d 64 75 6d 70 20 23 |tart-aut|o-dump #|
|00000780| 5b 6e 69 6c 20 22 c0 c1 | c2 c3 23 87 22 20 5b 61 |[nil "..|..#." [a|
|00000790| 64 64 2d 68 6f 6f 6b 20 | 70 6f 73 74 2d 63 6f 6d |dd-hook |post-com|
|000007a0| 6d 61 6e 64 2d 68 6f 6f | 6b 20 73 67 6d 6c 2d 61 |mand-hoo|k sgml-a|
|000007b0| 75 74 6f 2d 64 75 6d 70 | 20 61 70 70 65 6e 64 5d |uto-dump| append]|
|000007c0| 20 34 20 6e 69 6c 20 6e | 69 6c 5d 29 0a 28 64 65 | 4 nil n|il]).(de|
|000007d0| 66 61 6c 69 61 73 20 27 | 73 67 6d 6c 2d 63 6f 6d |falias '|sgml-com|
|000007e0| 65 70 6f 73 20 23 5b 28 | 65 70 6f 73 29 20 22 c0 |epos #[(|epos) ".|
|000007f0| 09 21 ab 8c c2 c3 c4 09 | 21 40 40 c5 09 21 23 87 |.!......|!@@..!#.|
|00000800| c2 c6 09 5c 22 87 22 20 | 5b 73 67 6d 6c 2d 73 74 |...\"." |[sgml-st|
|00000810| 72 69 63 74 2d 65 70 6f | 73 2d 70 20 65 70 6f 73 |rict-epo|s-p epos|
|00000820| 20 66 6f 72 6d 61 74 20 | 22 25 73 3a 25 73 22 20 | format |"%s:%s" |
|00000830| 73 67 6d 6c 2d 65 70 6f | 73 2d 65 72 65 66 20 73 |sgml-epo|s-eref s|
|00000840| 67 6d 6c 2d 65 70 6f 73 | 2d 70 6f 73 20 22 25 73 |gml-epos|-pos "%s|
|00000850| 22 5d 20 35 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |"] 5]).(|defalias|
|00000860| 20 27 73 67 6d 6c 2d 64 | 75 6d 70 2d 6e 6f 64 65 | 'sgml-d|ump-node|
|00000870| 20 23 5b 28 75 29 20 22 | c0 c1 c2 0b c4 48 c5 5c | #[(u) "|.....H.\|
|00000880| 22 c6 0b 21 c7 0b 21 0b | c8 48 0b c9 48 ad 83 ca |"..!..!.|.H..H...|
|00000890| 0b 21 0b cb 48 cc 0b cd | 48 21 cc 0b c9 48 21 0b |.!..H...|H!...H!.|
|000008a0| ce 48 26 5c 6e 87 22 20 | 5b 66 6f 72 6d 61 74 20 |.H&\n." |[format |
|000008b0| 22 25 73 25 73 20 73 74 | 61 72 74 3a 25 73 28 25 |"%s%s st|art:%s(%|
|000008c0| 73 29 20 65 6e 64 3a 25 | 73 28 25 73 29 20 65 70 |s) end:%|s(%s) ep|
|000008d0| 6f 73 3a 25 73 2f 25 73 | 20 6e 65 74 3a 25 73 5c |os:%s/%s| net:%s\|
|000008e0| 6e 22 20 6d 61 6b 65 2d | 73 74 72 69 6e 67 20 75 |n" make-|string u|
|000008f0| 20 36 20 3f 5c 2e 20 73 | 67 6d 6c 2d 65 6c 65 6d | 6 ?\. s|gml-elem|
|00000900| 65 6e 74 2d 67 69 20 73 | 67 6d 6c 2d 65 6c 65 6d |ent-gi s|gml-elem|
|00000910| 65 6e 74 2d 73 74 61 72 | 74 20 33 20 32 20 73 67 |ent-star|t 3 2 sg|
|00000920| 6d 6c 2d 74 72 65 65 2d | 65 6e 64 20 34 20 73 67 |ml-tree-|end 4 sg|
|00000930| 6d 6c 2d 63 6f 6d 65 70 | 6f 73 20 31 20 31 32 5d |ml-comep|os 1 12]|
|00000940| 20 31 32 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 | 12]).(d|efalias |
|00000950| 27 73 67 6d 6c 2d 64 75 | 6d 70 2d 72 65 63 20 23 |'sgml-du|mp-rec #|
|00000960| 5b 28 75 29 20 22 08 ad | 94 c1 c2 08 21 21 88 c3 |[(u) "..|....!!..|
|00000970| 08 c4 48 21 88 08 c5 48 | 89 10 ac 6d c6 87 22 20 |..H!...H|...m.." |
|00000980| 5b 75 20 70 72 69 6e 63 | 20 73 67 6d 6c 2d 64 75 |[u princ| sgml-du|
|00000990| 6d 70 2d 6e 6f 64 65 20 | 73 67 6d 6c 2d 64 75 6d |mp-node |sgml-dum|
|000009a0| 70 2d 72 65 63 20 31 31 | 20 31 30 20 6e 69 6c 5d |p-rec 11| 10 nil]|
|000009b0| 20 34 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 4]).(de|falias '|
|000009c0| 73 67 6d 6c 2d 73 68 6f | 72 74 72 65 66 2d 69 64 |sgml-sho|rtref-id|
|000009d0| 65 6e 74 69 66 79 20 23 | 5b 6e 69 6c 20 22 c0 60 |entify #|[nil ".`|
|000009e0| 21 88 60 09 61 1a c3 0c | 5c 6e 5c 22 1d c6 c7 0d |!.`.a...|\n\"....|
|000009f0| 5c 6e 23 2a 87 22 20 5b | 73 67 6d 6c 2d 66 69 6e |\n#*." [|sgml-fin|
|00000a00| 64 2d 63 6f 6e 74 65 78 | 74 2d 6f 66 20 73 67 6d |d-contex|t-of sgm|
|00000a10| 6c 2d 72 73 2d 69 67 6e | 6f 72 65 2d 70 6f 73 20 |l-rs-ign|ore-pos |
|00000a20| 6e 6f 62 6f 6c 20 73 67 | 6d 6c 2d 64 65 72 65 66 |nobol sg|ml-deref|
|00000a30| 2d 73 68 6f 72 74 6d 61 | 70 20 73 67 6d 6c 2d 63 |-shortma|p sgml-c|
|00000a40| 75 72 72 65 6e 74 2d 73 | 68 6f 72 74 6d 61 70 20 |urrent-s|hortmap |
|00000a50| 74 65 6d 20 6d 65 73 73 | 61 67 65 20 22 25 73 20 |tem mess|age "%s |
|00000a60| 28 25 73 29 22 5d 20 34 | 20 6e 69 6c 20 6e 69 6c |(%s)"] 4| nil nil|
|00000a70| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 73 67 |]).(defa|lias 'sg|
|00000a80| 6d 6c 2d 6c 6f 6f 6b 75 | 70 2d 73 68 6f 72 74 72 |ml-looku|p-shortr|
|00000a90| 65 66 2d 6e 61 6d 65 20 | 23 5b 28 74 61 62 6c 65 |ef-name |#[(table|
|00000aa0| 20 6d 61 70 29 20 22 c0 | 09 5c 6e 41 5c 22 40 87 | map) ".|.\nA\"@.|
|00000ab0| 22 20 5b 72 61 73 73 71 | 20 6d 61 70 20 74 61 62 |" [rassq| map tab|
|00000ac0| 6c 65 5d 20 33 5d 29 0a | 28 64 65 66 61 6c 69 61 |le] 3]).|(defalia|
|00000ad0| 73 20 27 73 67 6d 6c 2d | 73 68 6f 77 2d 63 75 72 |s 'sgml-|show-cur|
|00000ae0| 72 65 6e 74 2d 6d 61 70 | 20 23 5b 6e 69 6c 20 22 |rent-map| #[nil "|
|00000af0| c0 60 21 88 c1 5c 6e c3 | 48 0c 5c 22 1d c6 c7 0d |.`!..\n.|H.\"....|
|00000b00| ae 81 c8 5c 22 29 87 22 | 20 5b 73 67 6d 6c 2d 66 |...\")."| [sgml-f|
|00000b10| 69 6e 64 2d 63 6f 6e 74 | 65 78 74 2d 6f 66 20 73 |ind-cont|ext-of s|
|00000b20| 67 6d 6c 2d 6c 6f 6f 6b | 75 70 2d 73 68 6f 72 74 |gml-look|up-short|
|00000b30| 72 65 66 2d 6e 61 6d 65 | 20 73 67 6d 6c 2d 64 74 |ref-name| sgml-dt|
|00000b40| 64 2d 69 6e 66 6f 20 34 | 20 73 67 6d 6c 2d 63 75 |d-info 4| sgml-cu|
|00000b50| 72 72 65 6e 74 2d 73 68 | 6f 72 74 6d 61 70 20 6e |rrent-sh|ortmap n|
|00000b60| 61 6d 65 20 6d 65 73 73 | 61 67 65 20 22 43 75 72 |ame mess|age "Cur|
|00000b70| 72 65 6e 74 20 6d 61 70 | 3a 20 25 73 22 20 22 23 |rent map|: %s" "#|
|00000b80| 45 4d 50 54 59 22 5d 20 | 33 20 6e 69 6c 20 6e 69 |EMPTY"] |3 nil ni|
|00000b90| 6c 5d 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |l]).(byt|e-code "|
|00000ba0| c0 11 c2 13 c4 15 0e 06 | ac 9e c7 c8 c9 ca 23 88 |........|......#.|
|00000bb0| c7 cb c9 cc 23 88 c7 cd | c9 ce 23 88 c7 cf c9 d0 |....#...|..#.....|
|00000bc0| 23 88 c7 d1 c9 d2 23 88 | c4 87 22 20 5b 33 20 65 |#.....#.|.." [3 e|
|00000bd0| 64 65 62 75 67 2d 70 72 | 69 6e 74 2d 6c 65 76 65 |debug-pr|int-leve|
|00000be0| 6c 20 35 20 65 64 65 62 | 75 67 2d 70 72 69 6e 74 |l 5 edeb|ug-print|
|00000bf0| 2d 6c 65 6e 67 74 68 20 | 6e 69 6c 20 65 64 65 62 |-length |nil edeb|
|00000c00| 75 67 2d 70 72 69 6e 74 | 2d 63 69 72 63 6c 65 20 |ug-print|-circle |
|00000c10| 73 67 6d 6c 2d 72 75 6e | 6e 69 6e 67 2d 78 65 6d |sgml-run|ning-xem|
|00000c20| 61 63 73 20 70 75 74 20 | 73 67 6d 6c 2d 77 69 74 |acs put |sgml-wit|
|00000c30| 68 2d 70 61 72 73 65 72 | 2d 73 79 6e 74 61 78 20 |h-parser|-syntax |
|00000c40| 65 64 65 62 75 67 2d 66 | 6f 72 6d 2d 73 70 65 63 |edebug-f|orm-spec|
|00000c50| 20 28 26 72 65 73 74 20 | 66 6f 72 6d 29 20 73 67 | (&rest |form) sg|
|00000c60| 6d 6c 2d 73 6b 69 70 2d | 75 70 74 6f 20 28 73 65 |ml-skip-|upto (se|
|00000c70| 78 70 29 20 73 67 6d 6c | 2d 63 68 65 63 6b 2d 64 |xp) sgml|-check-d|
|00000c80| 65 6c 69 6d 20 28 73 65 | 78 70 20 26 6f 70 74 69 |elim (se|xp &opti|
|00000c90| 6f 6e 61 6c 20 73 65 78 | 70 29 20 73 67 6d 6c 2d |onal sex|p) sgml-|
|00000ca0| 70 61 72 73 65 2d 64 65 | 6c 69 6d 20 28 73 65 78 |parse-de|lim (sex|
|00000cb0| 70 20 26 6f 70 74 69 6f | 6e 61 6c 20 73 65 78 70 |p &optio|nal sexp|
|00000cc0| 29 20 73 67 6d 6c 2d 69 | 73 2d 64 65 6c 69 6d 20 |) sgml-i|s-delim |
|00000cd0| 28 73 65 78 70 20 26 6f | 70 74 69 6f 6e 61 6c 20 |(sexp &o|ptional |
|00000ce0| 73 65 78 70 20 73 65 78 | 70 20 73 65 78 70 29 5d |sexp sex|p sexp)]|
|00000cf0| 20 34 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 73 | 4).(def|alias 's|
|00000d00| 67 6d 6c 2d 64 75 6d 70 | 2d 64 74 64 20 23 5b 28 |gml-dump|-dtd #[(|
|00000d10| 26 6f 70 74 69 6f 6e 61 | 6c 20 64 74 64 29 20 22 |&optiona|l dtd) "|
|00000d20| 08 ac 90 09 c2 48 0b 73 | ac 85 c4 c5 09 5c 22 88 |.....H.s|.....\".|
|00000d30| 09 c6 48 10 c7 90 c8 c9 | ca 08 cb 48 5c 22 21 88 |..H.....|...H\"!.|
|00000d40| cc cd 08 c6 48 5c 22 88 | ce 91 87 22 20 5b 64 74 |....H\".|..." [dt|
|00000d50| 64 20 73 67 6d 6c 2d 62 | 75 66 66 65 72 2d 70 61 |d sgml-b|uffer-pa|
|00000d60| 72 73 65 2d 73 74 61 74 | 65 20 30 20 63 6c 2d 73 |rse-stat|e 0 cl-s|
|00000d70| 74 72 75 63 74 2d 73 67 | 6d 6c 2d 70 73 74 61 74 |truct-sg|ml-pstat|
|00000d80| 65 2d 74 61 67 73 20 65 | 72 72 6f 72 20 22 73 67 |e-tags e|rror "sg|
|00000d90| 6d 6c 2d 70 73 74 61 74 | 65 2d 64 74 64 20 61 63 |ml-pstat|e-dtd ac|
|00000da0| 63 65 73 73 69 6e 67 20 | 61 20 6e 6f 6e 2d 73 67 |cessing |a non-sg|
|00000db0| 6d 6c 2d 70 73 74 61 74 | 65 22 20 31 20 22 2a 44 |ml-pstat|e" 1 "*D|
|00000dc0| 54 44 20 64 75 6d 70 2a | 22 20 70 72 69 6e 63 20 |TD dump*|" princ |
|00000dd0| 66 6f 72 6d 61 74 20 22 | 44 65 70 65 6e 64 65 6e |format "|Dependen|
|00000de0| 63 69 65 73 3a 20 25 53 | 5c 6e 22 20 36 20 6d 61 |cies: %S|\n" 6 ma|
|00000df0| 70 61 74 6f 6d 73 20 23 | 5b 28 65 74 29 20 22 c0 |patoms #|[(et) ".|
|00000e00| 09 21 87 22 20 5b 73 67 | 6d 6c 2d 64 70 2d 65 6c |.!." [sg|ml-dp-el|
|00000e10| 65 6d 65 6e 74 20 65 74 | 5d 20 32 5d 20 6e 69 6c |ement et|] 2] nil|
|00000e20| 5d 20 36 20 6e 69 6c 20 | 6e 69 6c 5d 29 0a 28 64 |] 6 nil |nil]).(d|
|00000e30| 65 66 61 6c 69 61 73 20 | 27 73 67 6d 6c 2d 64 75 |efalias |'sgml-du|
|00000e40| 6d 70 2d 65 6c 65 6d 65 | 6e 74 20 23 5b 28 65 6c |mp-eleme|nt #[(el|
|00000e50| 2d 6e 61 6d 65 29 20 22 | c0 90 c1 c2 0b 21 21 91 |-name) "|.....!!.|
|00000e60| 87 22 20 5b 22 2a 45 6c | 65 6d 65 6e 74 20 64 75 |." ["*El|ement du|
|00000e70| 6d 70 2a 22 20 73 67 6d | 6c 2d 64 70 2d 65 6c 65 |mp*" sgm|l-dp-ele|
|00000e80| 6d 65 6e 74 20 73 67 6d | 6c 2d 6c 6f 6f 6b 75 70 |ment sgm|l-lookup|
|00000e90| 2d 65 6c 74 79 70 65 20 | 65 6c 2d 6e 61 6d 65 5d |-eltype |el-name]|
|00000ea0| 20 34 20 6e 69 6c 20 28 | 6c 69 73 74 20 28 63 6f | 4 nil (|list (co|
|00000eb0| 6d 70 6c 65 74 69 6e 67 | 2d 72 65 61 64 20 22 45 |mpleting|-read "E|
|00000ec0| 6c 65 6d 65 6e 74 3a 20 | 22 20 28 73 67 6d 6c 2d |lement: |" (sgml-|
|00000ed0| 64 74 64 2d 65 6c 74 79 | 70 65 73 20 28 73 67 6d |dtd-elty|pes (sgm|
|00000ee0| 6c 2d 70 73 74 61 74 65 | 2d 64 74 64 20 73 67 6d |l-pstate|-dtd sgm|
|00000ef0| 6c 2d 62 75 66 66 65 72 | 2d 70 61 72 73 65 2d 73 |l-buffer|-parse-s|
|00000f00| 74 61 74 65 29 29 20 6e | 69 6c 20 74 29 29 5d 29 |tate)) n|il t))])|
|00000f10| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 73 67 6d 6c |.(defali|as 'sgml|
|00000f20| 2d 64 70 2d 65 6c 65 6d | 65 6e 74 20 23 5b 28 65 |-dp-elem|ent #[(e|
|00000f30| 6c 29 20 22 c0 09 21 ab | dc c2 c3 c4 c5 09 21 c6 |l) "..!.|......!.|
|00000f40| 09 21 ab 83 c7 aa 81 c8 | c9 09 21 ab 83 c7 aa 81 |.!......|..!.....|
|00000f50| c8 ca 09 4a 57 ab 83 cb | aa 81 cc 25 21 88 cd 09 |...JW...|...%!...|
|00000f60| 21 3a ab 88 ce cd 09 21 | 21 88 aa 89 cf cd 09 21 |!:.....!|!......!|
|00000f70| 21 88 d0 20 88 c2 c3 d1 | 09 d2 4e 09 d3 4e 23 21 |!.. ....|..N..N#!|
|00000f80| 88 c2 c3 d4 09 d5 4e 5c | 22 21 88 c2 c3 d6 d7 09 |......N\|"!......|
|00000f90| 21 5c 22 21 88 aa 89 c2 | c3 d8 c5 09 21 5c 22 21 |!\"!....|....!\"!|
|00000fa0| 88 d0 20 87 22 20 5b 73 | 67 6d 6c 2d 65 6c 74 79 |.. ." [s|gml-elty|
|00000fb0| 70 65 2d 64 65 66 69 6e | 65 64 20 65 6c 20 70 72 |pe-defin|ed el pr|
|00000fc0| 69 6e 63 20 66 6f 72 6d | 61 74 20 22 45 6c 65 6d |inc form|at "Elem|
|00000fd0| 65 6e 74 20 25 73 20 25 | 73 20 25 73 25 73 3a 5c |ent %s %|s %s%s:\|
|00000fe0| 6e 22 20 73 79 6d 62 6f | 6c 2d 6e 61 6d 65 20 73 |n" symbo|l-name s|
|00000ff0| 67 6d 6c 2d 65 6c 74 79 | 70 65 2d 73 74 61 67 2d |gml-elty|pe-stag-|
|00001000| 6f 70 74 69 6f 6e 61 6c | 20 22 4f 22 20 22 2d 22 |optional| "O" "-"|
|00001010| 20 73 67 6d 6c 2d 65 6c | 74 79 70 65 2d 65 74 61 | sgml-el|type-eta|
|00001020| 67 2d 6f 70 74 69 6f 6e | 61 6c 20 33 20 22 20 6d |g-option|al 3 " m|
|00001030| 69 78 65 64 22 20 22 22 | 20 73 67 6d 6c 2d 65 6c |ixed" ""| sgml-el|
|00001040| 74 79 70 65 2d 6d 6f 64 | 65 6c 20 73 67 6d 6c 2d |type-mod|el sgml-|
|00001050| 64 70 2d 6d 6f 64 65 6c | 20 70 72 69 6e 31 20 74 |dp-model| prin1 t|
|00001060| 65 72 70 72 69 20 22 45 | 78 65 70 74 69 6f 6e 73 |erpri "E|xeptions|
|00001070| 3a 20 2b 25 53 20 2d 25 | 53 5c 6e 22 20 69 6e 63 |: +%S -%|S\n" inc|
|00001080| 6c 75 64 65 73 20 65 78 | 63 6c 75 64 65 73 20 22 |ludes ex|cludes "|
|00001090| 41 74 74 6c 69 73 74 3a | 20 25 53 5c 6e 22 20 61 |Attlist:| %S\n" a|
|000010a0| 74 74 6c 69 73 74 20 22 | 50 6c 69 73 74 3a 20 25 |ttlist "|Plist: %|
|000010b0| 53 5c 6e 22 20 73 79 6d | 62 6f 6c 2d 70 6c 69 73 |S\n" sym|bol-plis|
|000010c0| 74 20 22 55 6e 64 65 66 | 69 6e 65 64 20 65 6c 65 |t "Undef|ined ele|
|000010d0| 6d 65 6e 74 20 25 73 5c | 6e 22 5d 20 39 5d 29 0a |ment %s\|n"] 9]).|
|000010e0| 28 64 65 66 61 6c 69 61 | 73 20 27 73 67 6d 6c 2d |(defalia|s 'sgml-|
|000010f0| 64 70 2d 6d 6f 64 65 6c | 20 23 5b 28 6d 6f 64 65 |dp-model| #[(mode|
|00001100| 6c 20 26 6f 70 74 69 6f | 6e 61 6c 20 69 6e 64 65 |l &optio|nal inde|
|00001110| 6e 74 29 20 22 08 ac 82 | c1 10 c2 0b 21 1c c1 1d |nt) "...|....!...|
|00001120| 0c 1e 06 c7 1e 08 0e 06 | 3a ab ec 0e 06 40 89 16 |........|:....@..|
|00001130| 08 40 40 c9 61 ab 9b ca | cb cc cd 08 ce 5c 22 0d |.@@.a...|.....\".|
|00001140| cf 0e 08 40 41 40 21 cf | 0e 08 40 41 41 21 25 21 |...@A@!.|..@AA!%!|
|00001150| 88 aa ba ca cb d0 cd 08 | ce 5c 22 0d 0e 08 40 40 |........|.\"...@@|
|00001160| 89 1e 11 0c b7 41 29 24 | 21 88 0e 08 40 41 1e 12 |.....A)$|!...@A..|
|00001170| c7 1e 13 0e 12 3a ab 95 | 0e 12 40 16 13 d4 0e 13 |.....:..|..@.....|
|00001180| 08 d5 5c 5c 5c 22 88 0e | 12 41 89 16 12 aa 68 2a |..\\\"..|.A....h*|
|00001190| 0d 54 15 0e 06 41 89 16 | 06 aa 11 2c c7 87 22 20 |.T...A..|...,.." |
|000011a0| 5b 69 6e 64 65 6e 74 20 | 30 20 73 67 6d 6c 2d 74 |[indent |0 sgml-t|
|000011b0| 72 61 6e 73 6c 61 74 65 | 2d 6d 6f 64 65 6c 20 6d |ranslate|-model m|
|000011c0| 6f 64 65 6c 20 73 67 6d | 6c 2d 63 6f 64 65 2d 78 |odel sgm|l-code-x|
|000011d0| 6c 61 74 65 20 69 20 47 | 38 37 37 32 39 20 6e 69 |late i G|87729 ni|
|000011e0| 6c 20 78 20 6e 6f 72 6d | 61 6c 2d 73 74 61 74 65 |l x norm|al-state|
|000011f0| 20 70 72 69 6e 63 20 66 | 6f 72 6d 61 74 20 22 25 | princ f|ormat "%|
|00001200| 73 25 64 3a 20 6f 70 74 | 73 3d 25 73 20 72 65 71 |s%d: opt|s=%s req|
|00001210| 73 3d 25 73 5c 6e 22 20 | 6d 61 6b 65 2d 73 74 72 |s=%s\n" |make-str|
|00001220| 69 6e 67 20 3f 5c 20 20 | 73 67 6d 6c 2d 75 6e 74 |ing ?\ |sgml-unt|
|00001230| 61 6e 67 65 6c 2d 6d 6f | 76 65 73 20 22 25 73 25 |angel-mo|ves "%s%|
|00001240| 64 3a 20 61 6e 64 2d 6e | 6f 64 65 20 6e 65 78 74 |d: and-n|ode next|
|00001250| 3d 25 64 5c 6e 22 20 6e | 6f 64 65 20 47 38 37 37 |=%d\n" n|ode G877|
|00001260| 33 30 20 6d 20 73 67 6d | 6c 2d 64 70 2d 6d 6f 64 |30 m sgm|l-dp-mod|
|00001270| 65 6c 20 32 5d 20 39 5d | 29 0a 28 64 65 66 61 6c |el 2] 9]|).(defal|
|00001280| 69 61 73 20 27 73 67 6d | 6c 2d 75 6e 74 61 6e 67 |ias 'sgm|l-untang|
|00001290| 65 6c 2d 6d 6f 76 65 73 | 20 23 5b 28 6d 6f 76 65 |el-moves| #[(move|
|000012a0| 73 29 20 22 08 19 c2 1b | c2 1c 09 3a ab 98 09 40 |s) "....|...:...@|
|000012b0| 89 13 40 0b 41 89 1d 0e | 06 b7 41 29 44 0c 42 14 |..@.A...|..A)D.B.|
|000012c0| 09 41 89 11 aa 65 0c 9f | 2b 87 22 20 5b 6d 6f 76 |.A...e..|+." [mov|
|000012d0| 65 73 20 47 38 37 37 33 | 31 20 6e 69 6c 20 6d 20 |es G8773|1 nil m |
|000012e0| 47 38 37 37 33 32 20 6e | 6f 64 65 20 73 67 6d 6c |G87732 n|ode sgml|
|000012f0| 2d 63 6f 64 65 2d 78 6c | 61 74 65 5d 20 34 5d 29 |-code-xl|ate] 4])|
|00001300| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 73 67 6d 6c |.(defali|as 'sgml|
|00001310| 2d 64 75 6d 70 2d 73 74 | 61 74 65 20 23 5b 6e 69 |-dump-st|ate #[ni|
|00001320| 6c 20 22 c0 90 c1 5c 6e | 21 91 87 22 20 5b 22 2a |l "...\n|!.." ["*|
|00001330| 53 74 61 74 65 20 64 75 | 6d 70 2a 22 20 73 67 6d |State du|mp*" sgm|
|00001340| 6c 2d 64 70 2d 73 74 61 | 74 65 20 73 67 6d 6c 2d |l-dp-sta|te sgml-|
|00001350| 63 75 72 72 65 6e 74 2d | 73 74 61 74 65 5d 20 33 |current-|state] 3|
|00001360| 20 6e 69 6c 20 6e 69 6c | 5d 29 0a 28 64 65 66 61 | nil nil|]).(defa|
|00001370| 6c 69 61 73 20 27 73 67 | 6d 6c 2d 64 70 2d 73 74 |lias 'sg|ml-dp-st|
|00001380| 61 74 65 20 23 5b 28 73 | 74 61 74 65 20 26 6f 70 |ate #[(s|tate &op|
|00001390| 74 69 6f 6e 61 6c 20 69 | 6e 64 65 6e 74 29 20 22 |tional i|ndent) "|
|000013a0| 08 ac 82 c1 10 5c 6e 40 | c3 61 ab 85 c4 5c 6e 08 |.....\n@|.a...\n.|
|000013b0| 5c 22 87 c5 c6 c7 c8 08 | c9 5c 22 5c 22 21 88 ca |\"......|.\"\"!..|
|000013c0| 5c 6e 89 1e 0b 40 29 08 | cc 5c 5c 5c 22 88 c5 c6 |\n...@).|.\\\"...|
|000013d0| cd c8 08 c9 5c 22 5c 22 | 21 88 ca 5c 6e 89 1e 0b |....\"\"|!..\n...|
|000013e0| 41 40 29 08 cc 5c 5c 5c | 22 88 c5 c6 ce c8 08 c9 |A@)..\\\|".......|
|000013f0| 5c 22 5c 22 21 88 5c 6e | 89 1e 0b 41 41 29 1e 0f |\"\"!.\n|...AA)..|
|00001400| d0 1e 11 0e 0f 3a ab 9f | 0e 0f 40 16 11 c4 0e 11 |.....:..|..@.....|
|00001410| 08 cc 5c 5c 5c 22 88 c5 | c6 d2 c8 08 c9 5c 22 5c |..\\\"..|.....\"\|
|00001420| 22 21 88 0e 0f 41 89 16 | 0f aa 5e 2a d0 87 22 20 |"!...A..|..^*.." |
|00001430| 5b 69 6e 64 65 6e 74 20 | 30 20 73 74 61 74 65 20 |[indent |0 state |
|00001440| 6e 6f 72 6d 61 6c 2d 73 | 74 61 74 65 20 73 67 6d |normal-s|tate sgm|
|00001450| 6c 2d 64 70 2d 6d 6f 64 | 65 6c 20 70 72 69 6e 63 |l-dp-mod|el princ|
|00001460| 20 66 6f 72 6d 61 74 20 | 22 25 73 61 6e 64 2d 73 | format |"%sand-s|
|00001470| 74 61 74 65 5c 6e 22 20 | 6d 61 6b 65 2d 73 74 72 |tate\n" |make-str|
|00001480| 69 6e 67 20 3f 5c 20 20 | 73 67 6d 6c 2d 64 70 2d |ing ?\ |sgml-dp-|
|00001490| 73 74 61 74 65 20 73 20 | 32 20 22 25 73 2d 2d 6e |state s |2 "%s--n|
|000014a0| 65 78 74 5c 6e 22 20 22 | 25 73 2d 2d 64 66 61 73 |ext\n" "|%s--dfas|
|000014b0| 5c 6e 22 20 47 38 37 37 | 33 33 20 6e 69 6c 20 6d |\n" G877|33 nil m|
|000014c0| 20 22 25 73 2d 2d 5c 6e | 22 5d 20 38 5d 29 0a 28 | "%s--\n|"] 8]).(|
|000014d0| 64 65 66 61 6c 69 61 73 | 20 27 73 67 6d 6c 2d 62 |defalias| 'sgml-b|
|000014e0| 75 69 6c 64 2d 61 75 74 | 6f 6c 6f 61 64 73 20 23 |uild-aut|oloads #|
|000014f0| 5b 6e 69 6c 20 22 c0 90 | c1 1a c3 1c 5c 6e 3a ab |[nil "..|....\n:.|
|00001500| de 5c 6e 40 14 c5 0c c6 | 50 21 71 88 65 62 88 6d |.\n@....|P!q.eb.m|
|00001510| ac c8 c7 c8 c3 c9 23 ab | c1 ca 94 ca 95 7b c3 1e |......#.|.....{..|
|00001520| 0b 1e 0c cd ca 21 88 ce | c3 77 88 67 cf 61 ab 89 |.....!..|.w.g.a..|
|00001530| 60 cd ca 21 88 60 7b 16 | 0b ce c3 77 88 d0 d1 21 |`..!.`{.|...w...!|
|00001540| ab 95 0e 0b ac 86 d2 d3 | 0e 0c 5c 22 88 d4 d5 d6 |........|..\"....|
|00001550| 0e 0c 0c 0e 0b 24 21 88 | 2a aa 35 5c 6e 41 89 12 |.....$!.|*.5\nA..|
|00001560| aa 1f 2a c3 91 87 22 20 | 5b 22 2a 61 75 74 6f 6c |..*..." |["*autol|
|00001570| 6f 61 64 2a 22 20 28 22 | 70 73 67 6d 6c 2d 70 61 |oad*" ("|psgml-pa|
|00001580| 72 73 65 22 20 22 70 73 | 67 6d 6c 2d 65 64 69 74 |rse" "ps|gml-edit|
|00001590| 22 20 22 70 73 67 6d 6c | 2d 64 74 64 22 20 22 70 |" "psgml|-dtd" "p|
|000015a0| 73 67 6d 6c 2d 69 6e 66 | 6f 22 20 22 70 73 67 6d |sgml-inf|o" "psgm|
|000015b0| 6c 2d 63 68 61 72 65 6e | 74 22 29 20 47 38 37 37 |l-charen|t") G877|
|000015c0| 33 34 20 6e 69 6c 20 66 | 69 6c 65 20 66 69 6e 64 |34 nil f|ile find|
|000015d0| 2d 66 69 6c 65 2d 6e 6f | 73 65 6c 65 63 74 20 22 |-file-no|select "|
|000015e0| 2e 65 6c 22 20 72 65 2d | 73 65 61 72 63 68 2d 66 |.el" re-|search-f|
|000015f0| 6f 72 77 61 72 64 20 22 | 5e 28 64 65 66 75 6e 20 |orward "|^(defun |
|00001600| 2b 5c 5c 28 5b 5e 20 5d | 2b 5c 5c 29 22 20 74 20 |+\\([^ ]|+\\)" t |
|00001610| 31 20 64 6f 63 20 6e 61 | 6d 65 20 66 6f 72 77 61 |1 doc na|me forwa|
|00001620| 72 64 2d 73 65 78 70 20 | 22 20 5c 6e 09 22 20 3f |rd-sexp |" \n." ?|
|00001630| 5c 22 20 6c 6f 6f 6b 69 | 6e 67 2d 61 74 20 22 28 |\" looki|ng-at "(|
|00001640| 69 6e 74 65 72 61 63 74 | 69 76 65 22 20 6d 65 73 |interact|ive" mes|
|00001650| 73 61 67 65 20 22 4e 6f | 20 64 6f 63 20 66 6f 72 |sage "No| doc for|
|00001660| 20 25 73 22 20 70 72 69 | 6e 63 20 66 6f 72 6d 61 | %s" pri|nc forma|
|00001670| 74 20 22 28 61 75 74 6f | 6c 6f 61 64 20 27 25 73 |t "(auto|load '%s|
|00001680| 20 5c 22 25 73 5c 22 20 | 25 73 20 74 29 5c 6e 22 | \"%s\" |%s t)\n"|
|00001690| 5d 20 38 20 6e 69 6c 20 | 6e 69 6c 5d 29 0a 28 64 |] 8 nil |nil]).(d|
|000016a0| 65 66 61 6c 69 61 73 20 | 27 74 65 73 74 2d 73 67 |efalias |'test-sg|
|000016b0| 6d 6c 20 23 5b 28 73 74 | 61 72 74 29 20 22 c0 c1 |ml #[(st|art) "..|
|000016c0| 1a 1b c4 90 c5 c6 0e 07 | 5c 22 13 c8 0b 21 ad b7 |........|\"...!..|
|000016d0| c9 c5 ca 0e 07 5c 22 21 | 88 cb 0b 21 88 cc cd ce |.....\"!|...!....|
|000016e0| 8f 88 cf 0e 10 21 ab 8b | c9 8a 0e 10 71 88 d1 20 |.....!..|....q.. |
|000016f0| 29 21 88 d2 20 88 d2 20 | 88 d3 d4 21 88 d5 70 21 |)!.. .. |...!..p!|
|00001700| 88 0e 07 54 16 07 aa 3e | 91 2a 87 22 20 5b 6e 69 |...T...>|.*." [ni|
|00001710| 6c 20 74 20 73 67 6d 6c | 2d 73 68 6f 77 2d 77 61 |l t sgml|-show-wa|
|00001720| 72 6e 69 6e 67 73 20 66 | 69 6c 65 20 22 2a 54 65 |rnings f|ile "*Te|
|00001730| 73 74 69 6e 67 20 70 73 | 67 6d 6c 2a 22 20 66 6f |sting ps|gml*" fo|
|00001740| 72 6d 61 74 20 22 2f 75 | 73 72 2f 6c 6f 63 61 6c |rmat "/u|sr/local|
|00001750| 2f 73 72 63 2f 73 67 6d | 6c 73 2d 31 2e 31 2f 74 |/src/sgm|ls-1.1/t|
|00001760| 65 73 74 2f 74 65 73 74 | 25 30 33 64 2e 73 67 6d |est/test|%03d.sgm|
|00001770| 22 20 73 74 61 72 74 20 | 66 69 6c 65 2d 65 78 69 |" start |file-exi|
|00001780| 73 74 73 2d 70 20 70 72 | 69 6e 63 20 22 2a 2a 2a |sts-p pr|inc "***|
|00001790| 20 46 69 6c 65 20 74 65 | 73 74 25 30 33 64 20 2a | File te|st%03d *|
|000017a0| 2a 2a 5c 6e 22 20 66 69 | 6e 64 2d 66 69 6c 65 20 |**\n" fi|nd-file |
|000017b0| 65 72 72 63 6f 64 65 20 | 28 62 79 74 65 2d 63 6f |errcode |(byte-co|
|000017c0| 64 65 20 22 c0 20 88 c1 | c2 21 87 22 20 5b 73 67 |de ". ..|.!." [sg|
|000017d0| 6d 6c 2d 70 61 72 73 65 | 2d 70 72 6f 6c 6f 67 20 |ml-parse|-prolog |
|000017e0| 73 67 6d 6c 2d 70 61 72 | 73 65 2d 75 6e 74 69 6c |sgml-par|se-until|
|000017f0| 2d 65 6e 64 2d 6f 66 20 | 6e 69 6c 5d 20 32 29 20 |-end-of |nil] 2) |
|00001800| 28 28 65 72 72 6f 72 20 | 28 62 79 74 65 2d 63 6f |((error |(byte-co|
|00001810| 64 65 20 22 c0 09 21 88 | c2 20 87 22 20 5b 70 72 |de "..!.|. ." [pr|
|00001820| 69 6e 63 20 65 72 72 63 | 6f 64 65 20 74 65 72 70 |inc errc|ode terp|
|00001830| 72 69 5d 20 32 29 29 29 | 20 67 65 74 2d 62 75 66 |ri] 2)))| get-buf|
|00001840| 66 65 72 20 73 67 6d 6c | 2d 6c 6f 67 2d 62 75 66 |fer sgml|-log-buf|
|00001850| 66 65 72 2d 6e 61 6d 65 | 20 62 75 66 66 65 72 2d |fer-name| buffer-|
|00001860| 73 74 72 69 6e 67 20 74 | 65 72 70 72 69 20 73 69 |string t|erpri si|
|00001870| 74 2d 66 6f 72 20 30 20 | 6b 69 6c 6c 2d 62 75 66 |t-for 0 |kill-buf|
|00001880| 66 65 72 5d 20 35 20 6e | 69 6c 20 22 70 22 5d 29 |fer] 5 n|il "p"])|
|00001890| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 70 72 6f 66 |.(defali|as 'prof|
|000018a0| 69 6c 65 2d 73 67 6d 6c | 20 23 5b 28 26 6f 70 74 |ile-sgml| #[(&opt|
|000018b0| 69 6f 6e 61 6c 20 66 69 | 6c 65 29 20 22 08 ac 84 |ional fi|le) "...|
|000018c0| c1 c2 21 10 c3 08 21 88 | c4 20 88 c5 20 88 c6 20 |..!...!.|. .. .. |
|000018d0| 88 c7 c8 1e 09 1e 5c 6e | 0e 09 0e 5c 6e 57 ab 8f |......\n|...\nW..|
|000018e0| cb 20 88 cc cd 21 88 0e | 09 54 89 16 09 aa 6c 2a |. ...!..|.T....l*|
|000018f0| ce 20 87 22 20 5b 66 69 | 6c 65 20 65 78 70 61 6e |. ." [fi|le expan|
|00001900| 64 2d 66 69 6c 65 2d 6e | 61 6d 65 20 22 7e 2f 73 |d-file-n|ame "~/s|
|00001910| 72 63 2f 70 73 67 6d 6c | 2f 30 2f 74 65 73 74 2f |rc/psgml|/0/test/|
|00001920| 73 68 6f 72 74 72 65 66 | 2e 73 67 6d 6c 22 20 66 |shortref|.sgml" f|
|00001930| 69 6e 64 2d 66 69 6c 65 | 20 73 67 6d 6c 2d 6e 65 |ind-file| sgml-ne|
|00001940| 65 64 2d 64 74 64 20 73 | 67 6d 6c 2d 69 6e 73 74 |ed-dtd s|gml-inst|
|00001950| 72 75 6d 65 6e 74 2d 70 | 61 72 73 65 72 20 65 6c |rument-p|arser el|
|00001960| 70 2d 72 65 73 65 74 2d | 61 6c 6c 20 32 30 20 30 |p-reset-|all 20 0|
|00001970| 20 69 20 2d 2d 64 6f 74 | 69 6d 65 73 2d 74 65 6d | i --dot|imes-tem|
|00001980| 70 2d 2d 38 37 37 33 35 | 20 67 61 72 62 61 67 65 |p--87735| garbage|
|00001990| 2d 63 6f 6c 6c 65 63 74 | 20 73 67 6d 6c 2d 72 65 |-collect| sgml-re|
|000019a0| 70 61 72 73 65 2d 62 75 | 66 66 65 72 20 73 67 6d |parse-bu|ffer sgm|
|000019b0| 6c 2d 68 61 6e 64 6c 65 | 2d 73 68 6f 72 74 72 65 |l-handle|-shortre|
|000019c0| 66 20 65 6c 70 2d 72 65 | 73 75 6c 74 73 5d 20 33 |f elp-re|sults] 3|
|000019d0| 20 6e 69 6c 20 6e 69 6c | 5d 29 0a 28 64 65 66 61 | nil nil|]).(defa|
|000019e0| 6c 69 61 73 20 27 73 67 | 6d 6c 2d 69 6e 73 74 72 |lias 'sg|ml-instr|
|000019f0| 75 6d 65 6e 74 2d 70 61 | 72 73 65 72 20 23 5b 6e |ument-pa|rser #[n|
|00001a00| 69 6c 20 22 c0 c1 21 88 | c2 13 c4 20 88 c5 13 c6 |il "..!.|... ....|
|00001a10| 20 87 22 20 5b 72 65 71 | 75 69 72 65 20 65 6c 70 | ." [req|uire elp|
|00001a20| 20 6e 69 6c 20 65 6c 70 | 2d 66 75 6e 63 74 69 6f | nil elp|-functio|
|00001a30| 6e 2d 6c 69 73 74 20 65 | 6c 70 2d 72 65 73 74 6f |n-list e|lp-resto|
|00001a40| 72 65 2d 61 6c 6c 20 28 | 73 67 6d 6c 2d 70 61 72 |re-all (|sgml-par|
|00001a50| 73 65 2d 74 6f 20 73 67 | 6d 6c 2d 70 61 72 73 65 |se-to sg|ml-parse|
|00001a60| 72 2d 6c 6f 6f 70 20 73 | 67 6d 6c 2d 70 61 72 73 |r-loop s|gml-pars|
|00001a70| 65 2d 6d 61 72 6b 75 70 | 2d 64 65 63 6c 61 72 61 |e-markup|-declara|
|00001a80| 74 69 6f 6e 20 73 67 6d | 6c 2d 64 6f 2d 70 72 6f |tion sgm|l-do-pro|
|00001a90| 63 65 73 73 69 6e 67 2d | 69 6e 73 74 72 75 63 74 |cessing-|instruct|
|00001aa0| 69 6f 6e 20 73 67 6d 6c | 2d 70 6f 70 2d 65 6e 74 |ion sgml|-pop-ent|
|00001ab0| 69 74 79 20 73 67 6d 6c | 2d 74 72 65 65 2d 6e 65 |ity sgml|-tree-ne|
|00001ac0| 74 2d 65 6e 61 62 6c 65 | 64 20 73 67 6d 6c 2d 64 |t-enable|d sgml-d|
|00001ad0| 6f 2d 65 6e 64 2d 74 61 | 67 20 73 67 6d 6c 2d 64 |o-end-ta|g sgml-d|
|00001ae0| 6f 2d 64 61 74 61 20 73 | 67 6d 6c 2d 64 65 72 65 |o-data s|gml-dere|
|00001af0| 66 2d 73 68 6f 72 74 6d | 61 70 20 73 67 6d 6c 2d |f-shortm|ap sgml-|
|00001b00| 68 61 6e 64 6c 65 2d 73 | 68 6f 72 74 72 65 66 20 |handle-s|hortref |
|00001b10| 73 67 6d 6c 2d 64 6f 2d | 73 74 61 72 74 2d 74 61 |sgml-do-|start-ta|
|00001b20| 67 20 73 67 6d 6c 2d 64 | 6f 2d 67 65 6e 65 72 61 |g sgml-d|o-genera|
|00001b30| 6c 2d 65 6e 74 69 74 79 | 2d 72 65 66 20 73 67 6d |l-entity|-ref sgm|
|00001b40| 6c 2d 73 65 74 2d 66 61 | 63 65 2d 66 6f 72 20 73 |l-set-fa|ce-for s|
|00001b50| 67 6d 6c 2d 70 63 64 61 | 74 61 2d 6d 6f 76 65 20 |gml-pcda|ta-move |
|00001b60| 73 67 6d 6c 2d 73 68 6f | 72 74 6d 61 70 2d 73 6b |sgml-sho|rtmap-sk|
|00001b70| 69 70 73 74 72 69 6e 67 | 29 20 65 6c 70 2d 69 6e |ipstring|) elp-in|
|00001b80| 73 74 72 75 6d 65 6e 74 | 2d 6c 69 73 74 5d 20 32 |strument|-list] 2|
|00001b90| 20 6e 69 6c 20 6e 69 6c | 5d 29 0a 28 64 65 66 61 | nil nil|]).(defa|
|00001ba0| 6c 69 61 73 20 27 73 67 | 6d 6c 2d 69 6e 73 74 72 |lias 'sg|ml-instr|
|00001bb0| 75 6d 65 6e 74 2d 64 74 | 64 2d 70 61 72 73 65 72 |ument-dt|d-parser|
|00001bc0| 20 23 5b 6e 69 6c 20 22 | c0 c1 21 88 c2 13 c4 20 | #[nil "|..!.... |
|00001bd0| 88 c5 13 c6 20 87 22 20 | 5b 72 65 71 75 69 72 65 |.... ." |[require|
|00001be0| 20 65 6c 70 20 6e 69 6c | 20 65 6c 70 2d 66 75 6e | elp nil| elp-fun|
|00001bf0| 63 74 69 6f 6e 2d 6c 69 | 73 74 20 65 6c 70 2d 72 |ction-li|st elp-r|
|00001c00| 65 73 74 6f 72 65 2d 61 | 6c 6c 20 28 73 67 6d 6c |estore-a|ll (sgml|
|00001c10| 2d 70 61 72 73 65 2d 70 | 72 6f 6c 6f 67 20 73 67 |-parse-p|rolog sg|
|00001c20| 6d 6c 2d 73 6b 69 70 2d | 64 73 20 73 67 6d 6c 2d |ml-skip-|ds sgml-|
|00001c30| 70 61 72 73 65 2d 6d 61 | 72 6b 75 70 2d 64 65 63 |parse-ma|rkup-dec|
|00001c40| 6c 61 72 61 74 69 6f 6e | 20 73 67 6d 6c 2d 63 68 |laration| sgml-ch|
|00001c50| 65 63 6b 2d 64 6f 63 74 | 79 70 65 2d 62 6f 64 79 |eck-doct|ype-body|
|00001c60| 20 73 67 6d 6c 2d 63 68 | 65 63 6b 2d 64 74 64 2d | sgml-ch|eck-dtd-|
|00001c70| 73 75 62 73 65 74 20 73 | 67 6d 6c 2d 70 61 72 73 |subset s|gml-pars|
|00001c80| 65 2d 64 73 20 73 67 6d | 6c 2d 64 65 63 6c 61 72 |e-ds sgm|l-declar|
|00001c90| 65 2d 61 74 74 6c 69 73 | 74 20 73 67 6d 6c 2d 64 |e-attlis|t sgml-d|
|00001ca0| 65 63 6c 61 72 65 2d 65 | 6e 74 69 74 79 20 73 67 |eclare-e|ntity sg|
|00001cb0| 6d 6c 2d 64 65 63 6c 61 | 72 65 2d 65 6c 65 6d 65 |ml-decla|re-eleme|
|00001cc0| 6e 74 20 73 67 6d 6c 2d | 64 65 63 6c 61 72 65 2d |nt sgml-|declare-|
|00001cd0| 73 68 6f 72 74 72 65 66 | 20 73 67 6d 6c 2d 70 61 |shortref| sgml-pa|
|00001ce0| 72 73 65 2d 70 61 72 61 | 6d 65 74 65 72 2d 6c 69 |rse-para|meter-li|
|00001cf0| 74 65 72 61 6c 20 73 67 | 6d 6c 2d 63 68 65 63 6b |teral sg|ml-check|
|00001d00| 2d 65 6c 65 6d 65 6e 74 | 2d 74 79 70 65 20 73 67 |-element|-type sg|
|00001d10| 6d 6c 2d 63 68 65 63 6b | 2d 70 72 69 6d 69 74 69 |ml-check|-primiti|
|00001d20| 76 65 2d 63 6f 6e 74 65 | 6e 74 2d 74 6f 6b 65 6e |ve-conte|nt-token|
|00001d30| 20 73 67 6d 6c 2d 63 68 | 65 63 6b 2d 6d 6f 64 65 | sgml-ch|eck-mode|
|00001d40| 6c 2d 67 72 6f 75 70 20 | 73 67 6d 6c 2d 70 61 72 |l-group |sgml-par|
|00001d50| 73 65 2d 6d 6f 64 69 66 | 69 65 72 20 73 67 6d 6c |se-modif|ier sgml|
|00001d60| 2d 6d 61 6b 65 2d 70 63 | 64 61 74 61 20 73 67 6d |-make-pc|data sgm|
|00001d70| 6c 2d 73 6b 69 70 2d 74 | 73 20 73 67 6d 6c 2d 6d |l-skip-t|s sgml-m|
|00001d80| 61 6b 65 2d 6f 70 74 20 | 73 67 6d 6c 2d 6d 61 6b |ake-opt |sgml-mak|
|00001d90| 65 2d 2a 20 73 67 6d 6c | 2d 6d 61 6b 65 2d 2b 20 |e-* sgml|-make-+ |
|00001da0| 73 67 6d 6c 2d 72 65 64 | 75 63 65 2d 5c 2c 20 73 |sgml-red|uce-\, s|
|00001db0| 67 6d 6c 2d 72 65 64 75 | 63 65 2d 7c 20 73 67 6d |gml-redu|ce-| sgm|
|00001dc0| 6c 2d 6d 61 6b 65 2d 26 | 20 73 67 6d 6c 2d 6d 61 |l-make-&| sgml-ma|
|00001dd0| 6b 65 2d 63 6f 6e 63 20 | 73 67 6d 6c 2d 63 6f 70 |ke-conc |sgml-cop|
|00001de0| 79 2d 6d 6f 76 65 73 20 | 73 67 6d 6c 2d 64 6f 2d |y-moves |sgml-do-|
|00001df0| 70 61 72 61 6d 65 74 65 | 72 2d 65 6e 74 69 74 79 |paramete|r-entity|
|00001e00| 2d 72 65 66 20 73 67 6d | 6c 2d 6d 61 6b 65 2d 70 |-ref sgm|l-make-p|
|00001e10| 72 69 6d 69 74 69 76 65 | 2d 63 6f 6e 74 65 6e 74 |rimitive|-content|
|00001e20| 2d 74 6f 6b 65 6e 20 73 | 67 6d 6c 2d 70 75 73 68 |-token s|gml-push|
|00001e30| 2d 74 6f 2d 65 6e 74 69 | 74 79 20 73 67 6d 6c 2d |-to-enti|ty sgml-|
|00001e40| 6c 6f 6f 6b 75 70 2d 65 | 6e 74 69 74 79 20 73 67 |lookup-e|ntity sg|
|00001e50| 6d 6c 2d 6c 6f 6f 6b 75 | 70 2d 65 6c 74 79 70 65 |ml-looku|p-eltype|
|00001e60| 20 73 67 6d 6c 2d 6f 6e | 65 2d 66 69 6e 61 6c 2d | sgml-on|e-final-|
|00001e70| 73 74 61 74 65 20 73 67 | 6d 6c 2d 72 65 6d 6f 76 |state sg|ml-remov|
|00001e80| 65 2d 72 65 64 75 6e 64 | 61 6e 74 2d 73 74 61 74 |e-redund|ant-stat|
|00001e90| 65 73 2d 31 29 20 65 6c | 70 2d 69 6e 73 74 72 75 |es-1) el|p-instru|
|00001ea0| 6d 65 6e 74 2d 6c 69 73 | 74 5d 20 32 20 6e 69 6c |ment-lis|t] 2 nil|
|00001eb0| 20 6e 69 6c 5d 29 0a | | nil]). | |
+--------+-------------------------+-------------------------+--------+--------+
